home *** CD-ROM | disk | FTP | other *** search
/ Shareware Grab Bag / Shareware Grab Bag.iso / 001 / qscripts.arc / BEEP.SCR next >
Encoding:
Text File  |  1986-03-02  |  468 b   |  28 lines
  1. .INCLUDE FILE FOR A AUDIO WARNING BEEP
  2.  
  3. .Please excuse the poor taste and foul language...
  4. NOTE    * * BEEP! BEEP! BEEP! -- DAMNIT -- B--E--E--P--!--! * *
  5. NOTE
  6.  
  7. BEEP 100
  8. BEEP 200
  9. BEEP 400
  10. BEEP 800
  11. BEEP 1600
  12. BEEP 3200
  13. BEEP 100
  14. BEEP 200
  15. BEEP 400
  16. BEEP 800
  17. BEEP 1600
  18. BEEP 3200
  19. BEEP 100
  20. BEEP 200
  21. BEEP 400
  22. BEEP 800
  23. BEEP 1600
  24. BEEP 3200
  25.  
  26. . Assigns GOTO to $1 and BEEPRET to $2 when it returns to the calling SCRIPT
  27. SCRIPT  $1      "GOTO   BEEPRET"
  28.